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Chapter 1* A Short Summary 



Expanded Color BASIC is a language d« i gned to; be ad^tfj on , to 
Microsoft's Extended Color BASIC tor Disk BASIC, if you 'have 
disk) • Although Extended BASIC Is a pretty powerful language, It 
is deficient In a number of respects? Expanded BASIC mak*s ,^ gopd f > 
these deficiencies. The new features of Expanded BASIC tnt lade : : 



Printing text i n all graphic modes and colors, 

A special 51x3^ piled-screen for PMGDE4, 

Scrolling of any section of any screen in any direction, 

Extra colors !n a new mode, 

Borders for the text screen, 

Extra graphic pages, 

Sound effects, 

REPEAT. . .UNTJL loops, 

Multiline IF ... THEN- ., ELSE statements, 

Procedures as a better alternative %o . subroutines. 

Local variables, 

Full ON-ERROR implementation, 

Break disabling, 

Autoline numbering, 

On-screen copying, 

User-definable printer widths, 

Single key entry of most BASIC words,. 

Function keys and finally, 

The ability to execute strings as commands. 



Chapter 2. About this Manual 

The purpose of this manual is to guide you in the application 
of Expanded Color BASIC. It assumes a knowledge of Microsoft 1 * 
BASIC . If you are not familiar with that, you are first advised 
to read the Radio ShacU Manuals, 'Getting Started with Color 
BASIC" and "Going Ahead with Extended BASIC", before attempting 
to start on Expanded BASIC. 

The following terms will be used throughout this manual: 

1) Command. This instructs the computer to perform something. 

e ,g. PRINT, INPUT, SOUND, GOTO etc. are all 
commands. 

2) Function . This is much like a command except that the 
computer supplies an answer. 

e .g. SIN, LOG, MID*, LEN, RND etc. are all 
f unct ions. 

3) Number. This is simply a number! 

e.g. 1, 1000, -.734 etc. are all numbers. 

4) Numeric variable. This uses a group of letters to represent 
a number. 

e.g. X, 22, ACTIVITY etc. are all variables. 
3> Numeric function. This returns a result which is a number. 

e.g. SIN, ATN, INT, INSTR, LEN etc. are all 
numeric functions. 

6) Operator. This is one of the set +, -, *, /, A , AND, OR and 
NOT. ••; 

7) Numeric expression . This is either a number, numeric 
variable, numeric function or a mixture thereof. 

e.g. 3, X + Y, S IN ( 2) - INT (F/2) *LOG (T A 5) , LEN(A*> etc. 
are all numeric expressions. 

8) String constant. This is a sequence of characters within 
quotation marks. 

e.g. "HELP", "This is a constant" are string 
constants. 

9) String variable. This a group of letters (suffixed by *> 
which represents a string. 

e.g. AS, LIS, GRAPHS etc. are all string variables. 

10) String function. This is a function that returns a string 
resu 1 t . 

e.g. MID», LEFT*, RIGHT*, INKEYS, HEX*, STR* etc . 
are string functions. 

11) String expression. This is either a string constant, string 
variable, string function or a mixture thereof. 

e.g. "HELLO", MID* ( A*, 2, 3) +LEFT*<EX*, INT (S/2) ) are 
string expressions. 



The following abbreviations recur throughout ! 

1> EXP. Expanded Color BASIC. 

2> EXPTAPE. Expanded Color BASIC system tape, 

3> EXPDISK. Expanded Color BASIC system disk, 

4> CoCo*i. TRS-80 Color Computer 1. 

5> CoCo*2. TRS-80 Color Computer 2. 



SECTION 1 - GRAPHIC/TEXT COMMANDS 
***************** **************** 

Chapter 3 - Meet Expanded BASIC 

To load EXP, firstly switch on your computer. IF IT IS ALREADY 
ON , SWITCH IT OFF AND TURN IT ON AGAIN. Obey the following 
instructions exactly as described: 

If you have disk 



1) Insert EXPDISK into drive 0. 

2> If you have a CoCotU then skip to step 4. 

3) Enter RUN"R". When "R" is fully run, the following message 
should appear on the screen: 

DISK EXTENDED COLOR BASIC 1.0 
COPYRIGHT <C) 1980 BY TANDY 
UNDER LICENSE FROM MICROSOFT 

4) Enter RUN"G" . When the program has fully run the following 
message should appear on the PM0DE4 graphic screen: 

DISK EXPANDED COLOR BASIC 1.3 
COPYRIGHT 1984 BY T.DELBOURGO 
INCLUDES GRAPHIC/TEXT COMMANDS 

If you have tape 
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EXPTAPE into tape recorder 
itian tape to beginning of 
r numbers on the label), 
ter CLOAD and press <PLAY>. 
<STOP>. 

er RUN and press <PLAY>. 
s, press <STOP>: 

EXTENDED COLOR BASIC 1.0 

COPYRIGHT <C) 1980 BY TANDY 

UNDER LICENSE FROM MICROSOFT 
ition tape to beginning of "G" program 
ter CLOAD and press <PLAY>. When the 
<STOP>, enter RUN and press <PLAY> again, 
er the following message appears, press <STOP>: 

EXPANDED COLOR BASIC 1.3 

COPYRIGHT 1934 BY T.DELBOURGO 

INCLUDES GRAPHIC/TEXT COMMANDS 



(Look at the 



When the 'OK* prompt reappears 
When the following message 



OK* prompt appears 



EXP is now loaded. At this point, stored in memory are: Color 
BASIC 1.1, Extended Color BASIC 1.0 and, if you have disk, Disk 
Extended Color BASIC 1.0. This applies regardless of what ROM 
memory your computer began with. 

Text is being written on the graphic screen at this stage. 
Enter TEXTON and you will find yourself back on the text screen. 
(Note that TEXTON clears the text screen). To get back to the 
graphic screen enter TEXTOFF. (TEXTOFF clears the graphic 
screen) . Enter CLS and you will find that the graphic screen 
goes clear. E/iter PCLS and the graphic screen will also clear , 
but , as well, the cursor will stay pat. Press <SHlFT>/<0> to go 
into the lowercase mode and type in a few characters. Notice 
that true lower-case appears -- not reverse video upper-case* 



Press <SHIFT>/<0> again to return to the uppercase node. 



Text in different COLORs and PMODEs. 



Go into PM0DE1 by entering PM0DE1. You may change the color of 
the text by using the COLOR command. Enter C0L0R4.2 and you 
will see red text on a yellow background. Go into color-set 1 
by entering SCREEN1.1 , Now you will find orange text on a cyan 
background. Enter COLORS, 9 to get white text on an orange 
background . Type CLS and the screen will clear to orange (the 
background color). Enter CLS7 and the screen will clear to 
magenta. Practise changing color-sets, modes and colors. 

You will scon notice that in different modes, the size of the 
text varies. In fact, in PMODEs and 1 the screen size for 
text is 16 across and 9 down. In PMODEs 2 and 3 the screen size 
is 16 by 16. In PM0DE4 it is 32 by 16. PRINTS on the graphic 
screen is fully implemented in EXP. Look at the PRINTS sheets 
in Appendix A to work out the PRINTS positions. 

We haven't yet changed graphic pages. Try doing so by entering 

PMODE0 ,2 . Type anything and press <ENTER>. Then enter PMODE0, 1 

. Enter PMODE0, 2 again and you will find that your text is 
still on that page. 

Small text *■; 



Get back into PM0DE4 ,1 by entering PM0DE4 t l . The PM0DE4 
graphic screen is very special because, with EXP, one can 
change the screen siie from 32 by 16 to 51 by 24. Obey the 
following instructions to do this: 

If you have disk 



1) Insert EXPDISK into drive 0. 
21 Enter: *SIZE(51X24) 

It you have tape 

1) Put EXPTAPE in your recorder. 

2) Position tape to beginning of "SIZ31X24" program. 

3) Enter CLOAD. When the "OK* prompt reappears press <STOP> , 
enter RUN and press <PLAY> again. 

4) When the *0K* prompt appears <it will be very small) press 
<STOP>. Note that the current program in memory will be erased 
when "SI231X24- is run. 

Type whatever you fancy on the screen. You will observe that 
the characters being typed in are diminutive. You can change 
color-sets , colors and graphic pages in the same way as you did 
with the 32 by 16 screen. However, when you are in the '31X24 
state* you can only print text on the PM0DE4 graphic screen or 
the text scrc»en. Enter PM0DE3 and you will find yourself back 
on the text screen because you cannot have PM0DE3 text in the 
'31X24 state'. Enter PM0DE4 to get back into PM0DE4. 



To return to the '32X16 state' obey the following instructions: 



If you have disk 

1> Insert EXPDISK into drive 0, 

2) Enter: *SIZE(32Xi6) 

If you have tape 



1) Put EXPTAPE in your recorder. 

2) Position tape to the start of ■SIZ32X16" program. 

3) Enter CLOAD. When the *0K' prompt reappears press <ST0P> , 
enter RUN and press <PLAY> again. 

4) When the 'OK* prompt appears press <ST0P>. 
Warning: the current program in memory will be erased! 
IMPORTANT REMARK : You cannot use filenames after the CLOAD and 
SKIPF commands when you are in the "TEXTOFF" state. 



KEYWORDS 

(This is unavailable if you are in the '51X24 state') 
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THE FOLLOWING CHAPTERS 



For the remainder of this section, it will be assumed that 
you have already loaded EXP, are in PM0DE4 and in the 'TEXTOFF 
state*. If not, please use the loading instructions that are 
described at the beginning of this chapter. 



Chapter 4. Improved loops 



REPEAT. . .UNTIL LOOPS 

The only loop available In ordinary BASIC im the FOR .. .NEXT 
loop . EXP introduces a new kind of loop, called a REPEAT... 
UNTIL loop. (These loops figure prominently in many high level 
languages like Pascal). An example of a REPEAT. .. UNTIL loop in 
a program is the following: 

10 PM0DE4, 1 

20 COLOR1,0 

30 CLS 

40 REPEAT 

50 PSET (RND(256) -1,RND<192> -1,1) 

60 UMTILPPOINT< 128j96)-l 

70 END 

The above program sets random green points on a black 
background . It repeats this process until the point at the 
centre of the screen (co-ordinates 128,96) is green. Therefore , 
by deduction , a REPEAT ...UNTIL loop keeps repeating what is 
in-between the REPEAT and UNTIL commands, until a certain 
condition is true . Anything can be placed between the REPEAT 
and UNTIL commands, including other REPEAT .. .UNTIL loops and 
FOR. . .NEXT loops. ' : 

The REPEAT command may only be placed at the beginning of a 
program line (only spaces can precede it). An ?RG error will 
result if you attempt to execute an UNTIL command before the 
corresponding REPEAT command is executed. 



MULTILINE IF. . .THEN. . . ELSEs 

The IF. . .THEN. . .ELSE statement of Color BASIC is probably one 
of the most vital commands of the vocabulary. It has, however, 
one major drawback: the IF, THEN and ELSE command* must all be 
placed on the same program line. In EXP, using the multiline IF. 
. .THEN. . .ELSE feature, one can introduce an IF .. .THEN .. .ELSE 
statement to take up as many lines as one chooses. An example 
of multiline IF ... THEN. .. ELSEs is given below: 

10 REPEAT 

20 INPUT-NumberMn 

30 IFn<0THEN 

40 PRINT-Negative" 

50 ELSE 

60 PRINT'Zero or positive' 

70 ENDIF 

80 UNTIL0«1 



The above program includes a few things that you have ndt 
encountered before . Firstly , variables in EXF* can either 1 be 
uppercase or lowercase. The first two characters of the 



variable name are the only two that are recognized by the 
computer. Lowercase variables are separate and distinct from 
uppercase variables , i.e. the variable A is different from the 



Secondly, the REPEAT. .. UNTIL 0*1 which surrounds the main body 
of the program means 'repeat forever*. The only way to get out 
of the program is to press <BREAK>. Line 30 to 70 of the 
program make up one big IF. .. THEN. .. ELSE statement. The ENDIF 
in line 70 signifies the end of the IF. .. THEN. .. ELSE statement. 

How does the computer know whether you intend to use a normal 
IF . . .THEN ...ELSE statement or a multiline one? The answer is 
very simple. If nothing is placed after the THEN command 
(spaces ,REM commands and colons count as something in this 
context!) then a multiline IF .. .THEN .. .ELSE statement is 
assumed . Also , you must be careful not to put anything after 
the ELSE and ENDIF commands -- only spaces are permitted before 
them . Like a normal IF. .. THEN. .. ELSE statement the ELSE part is 
optional. The ENDIF command is mandatory. Between the THEN and 
the ELSE , and the ELSE and the ENDIF anything can be written 
(including REPEAT. .. UNTIL loops, normal and multiline IF. ..THEN. 
. .ELSE statements) . 



INDENTATION 

Indenting programs can make programs easier to understand. To 
indent programs use the EDIT command to insert the 'required 
number of spaces. Everything between REPEAT and UNTIL commands, 
FOR and NEXT commands, and THEN and ENDIF commands (apart from 
the ELSE command) should be indented three of four spaces 
further to the right. Consider the layout of the above program 
when it is indented: 



10 


REPEAT 


20 


INPUT-Number" in 


30 


IFn<0THEN 


40 


PRINT"Positive- 


50 


ELSE 


60 


PRINT-Zero or negative 


70 


ENDIF 


80 


UNTIL0-1 



This facility makes the prbgram much easier to read than one 
lacking indentation. All programs in this manual will be 
indented from now on. 



Chapter 3. Procedures 

Procedures are very similar, but more versatile , than 

subroutines . Every procedure has its own name that can be a 
maximum of 30 characters long. To execute a procedure you must 

place the PROC command in front of the procedure's name. 

Information can be passed to the procedure. Each item of 

Information must be separated by a comma and brackets must 

enclose the whole list of information items. 

A procedure is defined using the DEFPROC command. If the 
procedure requires information to be passed to it, then a list 
of variables must be placed Inside brackets (each variable 
being separated by a comma) . When the procedure is executed 
each variable is made equal to the corresponding item of 
information . At the end of the definition an ENDPROC command 
must be placed. This tells the computer that the procedure has 
ended and the computer must now execute the BASIC command that 
is after the PROC command. In many ways, PROC is like GOSUB , 
and ENDPROC is like RETURN. The following program illustrates 
the use of procedures: 



10 PM0DE3, 1 

20 C0L0R6,5 

30 CLS 

40 SCREEN!, 1 ... 

50 PROChome 

60 REPEAT 

70 PRINTS0, - "! 

80 INPUTaS 

90 IFLEFT«(aS,2)--UP" THEN PROCup ( VAL (MID*< a*, 3) ) ) 
100 IFLEFTS(a*,4)-"D0WM" THEN PROCdown (VAL (MID* (a*, 5) ) ) 
110 IFLEFTS(a*,4)--LEFT" THEN PROC lef t ( VAL (MID* (a*, 5) ) ) 
120 IFLEFT*(a*,5)-"RIGHT" THEN PROCr ight (UAL (MID* (a*, 6) ) ) 
130 IFaS="CLS B THEN CLS 
140 IFa*=*"HOME" THEN PROChome 
150 UNTILa*="END" 
160 END 

165 **************************** 
170 DEFPROChome 
160 x«=128 
190 y=96 
200 ENDPROC 
210 DEFPROCup (n) 
220 y*y-n 

230 LINE-(x,y> , PSET 
240 ENDPROC 
250 DEFPROCdown (n) 

260 y*y + n 

270 LINE-(x,y) , PSET 

280 ENDPROC 

290 DEFPROClef t (n) 

300 x=»x-n 

310 LINE- (x,y> ,PSET 

320 ENDPROC 

330 EEFPROCr ight (n) 

340 x=x+n /-^~> sis* - ,' 

350 LIN£-<*,y),PSET }(> Q t~/ V 0"^< 
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Lines 10 to 40 of this drawing-board program simply change 
modes , color-sets and colors . Line 50 executes a procedure 
called "home - which 'homes' the x and y co-ordinates of the 
scrfcen , i.e. makes them equal to the centre of the screen. The 
REPEAT. .. UNTILa*="END" loop keeps repeating until your input is 
■END - (see Line 30). Line 70 makes sure that the cursor is at 
the top of the screen when you input. 

If you input "UP35" then the computer will draw a line upwards 
that is 35 units long. The same applies to DOWN, LEFT and RIGHT. 
If you enter "CLS" then the computer will clear the screen f 
and if "HOME" is entered then it will move the x and y 
co-ordinates to the screen's centre (128,96). 



Lines 90 to 120 are the most difficult to comprehend. In plain 
English , Line 90 reads: * If the first two characters of a* are 
■UP" then execute a procedure with the name of "up". The 
information to be passed to the procedure is the value of a* 
from the third character onwards. The variable n is made equal 
to that value.' A similar concept applies to Lines 100 to 120. 
(Note the END command in Line 160. It does not really need to 
be there since the computer will never execute Line 160). The 
rest of the program consists of the definitions of the 



procedures . 
next chapter 



Save the program . You will be needing it in the 



If you are writing a program in which a string constant is an 
item of information that is passed to the procedure then you 
must put a • ""+ ' (null string and then a plus sign) in front 
of the string constant . The DEFPROC command should only be 
placed at the beginning of a program line and you should put 
nothing before it (not even spaces). The names of procedures do 
not need to be in lower-case, but they are certainly easier to 
read that way. The names can be anything you choose. 



An ?RG error will occur if you try to ENDPROC without executing 
a procedure. A ?UL error will result if the procedure's name 
does not exist anywhere in the program. You will get an ?SN 
error or ?TM error if there is an error in a PROC command line 
or DEFPROC command line. The error will always be registered in 
the PROC line. A ?SN ERROR will also arise if you try to 
execute a procedure without using the PROC command. 



M 



DELPROC 

Every 

where i 
execute 
does re 
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DELPROC 
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DELPROC 



time a procedure is executed, the computer must remember 

t must return to so that when the ENDPROC command is 

d it will know where to continue your program. When it 

turn, the computer has no -further need of remembering 

eturn line* and so the computer will forget. By using the 

command you can make the computer -forget the last 

line that it remembered, without having to return -from 

cedure! By using DELPROC0, the computer will -forget ALL 

lines . The syntaxes -for DELPROC and DELPROC0 are simply 

and DELPROC0! You'll only \/ery occasionally want to use 

and DELPROC0. 



STRUCTURED PROGRAMMING 

Programming in a structured way is possible in EXP. Structured 
programming is a necessity in many other computer languages 
In EXPANDED BASIC it involves: 

11 Indenting programs. 

2) Not using GOTO unless absolutely necessary. 

3) Using procedures , REPEAT. .. UNTIL loops and multiline IF... 
THEN... ELSE statements. 

A) Hardly ever using colons. *' ; 

5) Using REM statements to describe the functioning o-f your 

program. 

A) Using lower-case variables and procedure names. 



Structured programs are far easier to follow that unstructured 
ones. 
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Chapter 6. Error Trapping 

In EXP, one can trap errors. 'Trapping errors* means going to a 
certain section of a program (called the 'error trap routine') 
when an error occurs. Normally, in Extended Color BASIC, an 
error message (e.g. ?SN ERROR) will be printed and the computer 
will stop running your program. By using the 'ONERROR 'GOTO* 
command we can instead go to a certain part of the program when 
an error happens. 

Reload the program you typed in in Chapter 5. Let us alter the 

program so that when an error occurs, the computer will go into 

PM0DE4, color-set before the error message is printed. Add 
the following lines'. 

5 ONERROR:GOTO1000 
1000 PM0DE4, 1 
1010 CLS 
1020 SCREEN1,0 
1030 ERRORERR 

Line 5 tells the computer to go to line 1000 when an error 
occurs. Lines 1000 to 1020 go into PM0DE4, color-set and 
clear the screen . EXP has a special command, ERROR, which 
causes an error message to be displayed. For example enter 
ERROR0 and the computer will respond with an ?NF error message. 
This is because the code for NF error is 0. Enter ERR0R4 and 
you will get an ?FC error (FC error's code is 4). A function 
called ERR tells us the code of the error that just occurred . 
Enter PRINTERR and you should get 4 (4 was the code of the last 
error). Therefore, in line 1030, ERRORERR means: 'print the 
error message of the error that has just occurred*. (The ERROR 
command also causes the computer to stop running your program) . 
EXP has another function called ERL. ERL tells you the line in 
which the error occurred. There is a list of all error codes in 
Appendix C. 

How can ah error occur in the program? Well, suppose you were 
to Input "LEFT1000". Since the grid size of the graphic screen 
for graphics is 256 by 192 , going LEFT1000 would obviously 
cause an ?FC error. Run the program and see for yourself what 
happens. 



EXP has three other commands that can be used in error trapp 
They are CONTON, CONTOFF and CONTERROR. These commands af 
the- operation of the <BREAK> key. CONTOFF disables the <BR 
key ti.e. <BREAK> now acts like any other key of the keyboar 
CONTON re-enables the <BREAK> key . CONTERROR makes <BR 
cause an error of code 127 everytime it is pressed. Now e 
ERR0R127 . You should get the break message, but in fact yo 
not! Instead, enter STOP. This time the message 'BREAK' 
appear » this shows that to BREAK the program you STOP ra 
than invoke ERR0R127. Th i s is how you do it in practice. 



1 ng. 
feet 
EAK> 

dJ . 
EAK> 
n ter 
u do 
does 
ther 



Add line 7 to your program: 
7 CONTERROR 
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Delete line 1030 and add! 

1030 IFERR-127THEN 
1040 STOP 
1030 ELSE 
1060 ERRORERR 
1070 END1F 

Now run the program. The break message should be displayed on 
the PM0DE4 screen when you press <BREAK>. Next change line 7 to: 



7 CONTOFF 

and run the program. Try pressing <BREAK>. You will -find that 
this will no longer let you 'break out' of the program. Type 
■DOWN20" but do not press <ENTER>. Instead press <BREAK> . 
Nothing should happen . When <BREAK> is in the 'CONTOFF state* 
and is pressed when you are inputting, <BREAK> will act like 
<ENTER> except that it causes the computer to ignore what you 
have just typed in. Press RESET to get back into the 'OK 1 mode - 
Change line 7 back to: 
7 CONTERROR 
Delete line 1030 and add these lines: 

1030 DELPROC0 

1040 PRINT'Error" *' : 

10S0 GOTO70 

Now run the program. You will discover that the computer prints 
■Error" everytime you press <BREAK> or cause an error. You 
should always use DELPROC0 in the error trapping routine, if 
the program contains prcedures. Remember that * ONERROR :GOT0* 
closes all open files and FOR... NEXT loops and also causes the 
computer to forget where it must return to after a GOSUB 
command. 

The command ERROROFF is the opposite of • ONERROR: GOTO* and 
allows the computer resume the normal way of printing error 
messages and breaking out of programs when an error occurs. 



RUN and CLEAR 



Here are a few facts about the RUN and CLEAR commands. Whenever 
a program is run, the computer closes all files, clears all 
variables , etc . In fact , the only thing that the computer 
remembers is the actual program. The same applies to Color 
BASIC'S CLEAR command . When the CLEAR command is entered 
everything is forgotten except the actual program and the 
number of string storage bytes that should be reserved. 



14- 



Chapter 7. New sounds and characters 



The tones available to you in Extended Color BASIC come via the 
PLAY and SOUND commands . Their quality is governed by the 
•square wave' shape of the note. With EXP, you can alter the 
•quality* of the tone and obtain some really bizarre sound 
effects by changing the shape of the wave patterns. The method 
is to define an envelope (wave) of sound with the ENVELOPE 
command and to play it using the BEEP command. The ENVELOPE 
command lets you increment the volume of the note played in 
each of four successive stages. The syntaxes for ENVELOPE and 
BEEP are: 

ENVELOPE nlpil ( vil,sllpi2,vl2,s2lpl3,vi3,s3lpi4,vl4 f s4 

where n is the envelope number, pi is the pitch increment, vi 
is the volume increment and s is the number of increments. n , 
pi, vi and s are numeric expressions. 

BEEP nlsp,sv,t 

where n is the envelope number, sp is the starting pitch and sv 
is the starting volume, t is the number of times the envelope 
is beeped. 

You may define up to 16 envelopes. Therefore the values for n 
must go from 1 to 16. p i , v i , s, sp , sv, t all range from to 255. 
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Each of the 4 parts of the envelope Instructs the computer to 
Increase the pitch (pi) and volume (vl) -for a specified number 
of steps. See the Figures p and v to see what happens typically. 
(If you wish to silence the computer In a particular part of 
the envelope make pi,vi and s all equal 0) . The starting pitch 
and volume of each sound effect Is determined by the sp and sv 
values In the BEEP command, t Is the number of times that the 
computer must 'beep' the envelope. 



REDEFINING CHARACTERS 

Using EXP, one can redefine 
redefining characters is: 



a character. The syntax for 



Although vl and pi range from to 255 , if vl and pi are made 
to exceed this range (by incrementing) then the numbers restart 
from <i ,e . the computer interprets the number 257 as 1). 
This means that you can decrease vi or pi by one by adding 235 I 
similarly for other decrements. 



An example of 
f o 1 lows: 



the BEEP and ENVELOPE commands in a program is as 



10 ENVELOPE 11 10,7,510,0,010,0,010,0,0 

20 FORp=0TO200STEP10 
30 BEEPlip, 100,30 
40 NEXTp 
50 END 

Line 10 defines only part 1 of envelope 1. (The other parts are 
silent) . The envelope Increases the pitch by 10 and the volume 
by 16 five times. Line 30 beeps envelope 1 with the starting 
pitch as the variable p , the starting volume as 100, for 30 
times. Run the program and hear the sound effect. Note that the 
higher the pitch, the faster the beep. 



Some useful sound envelopes are listed in Appendix D, 
urged to experiment and develop your own. 



You are 



CHR*(c>-dl,d2,d3,d4,d5,d6,d7,d8,d9 f dl0,dll f dl2 

where c is a numeric expression ranging from 32 to 127 and the 
'd's are numeric expressions ranging from to 255. 

For example, to redefine CHR*(95) (produced when you press 
<SHIFT>/<up arrow)) from a back arrow to a dagger, you would 
first have to draw up the new character on a sheet of paper . 
You would write a '1* to represent the foreground color and a 
'0' for the background color. There are 8 dot positions across 
and 12 down for each character. The dagger, drawn in a series 
of 0's and l's would look like: 



00000000 


-0 


00000000 


»0 


00010000 


»16 


01111100 


= 124 


01111100 


= 124 


00010000 


«16 


00010000 


-16 


00010000 


= 16 


00010000 


= 16 


00010000 


«16 


00000000 


=0 


00000000 


»0 



The next step is to translate each row into a number. Each row 
represents one byte in binary. To work out the conversion to 
decimal look up pages 184 to 18? of "Going Ahead With Extended 
Color BASIC" . There you will see a list of base conversions. 
Look under the column headed binary and find the appropriate 
pattern of 0*s and l's that corresponds exactly to the pattern 
of the row. In the example above, these numbers are written 
after the equal sign. Thus you would then enter: 

CHR*<95)=0,0, 16, 124, 124, 16, 16, 16, 16, 16,0,0 

Press <SHlFT>/<up arrow) and you will discover a dagger instead 
of a back arrow. 



You may also redefine characters when in the '51X24 state* . 
However , the *d*s must go from to 15 and there must be only 
eight 'd's listed (instead of 12) since a •51X24' character is 
4 dots across and 8 dots down. 
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Chapter 8 - Scrolling 



SCROLLING ON THE TEXT SCREEN 

Type in the following program: 

10 TEXTON 

20 CLS8 

30 PRINT9230, "THIS IS AN EXAMPLE"! 

40 PRINT@265, "OF SCROLLING" I 

50 REPEAT 

60 SCR<6,5>-<23, 10) , 150,L 

70 FORdelay-lTO400 

80 NEXTdelay 

90 UNTIL0=1 

and run it. Press <BREAK> to get back into the 'OK' mode. The 
program is an example of scrolling. Scrolling, put simply, is 
moving the screen display within a section of the screen. In 
the above program , the message "THIS IS AN EXAMPLE OF 
SCROLLING" moves slowly left across a certain scetlon o-f the 
text screen. We'll call a section of a screen a 'window*. 



To scroll on the text screen 



the SCR command. Its syntax is! 



SCR(a,b) -(c,d),e, direct! on 

where (a,b) is the top left corner of 
the bottom right corner of the win 
code of the column or row of character 
the case of the program above: the 
far right of the window). Direction is 
for left and R for right. Obviously 
b<d. Since the text screen Is 32 acros 
numeric expressions ranging from 
from to 15. In line 60 the SCR comma 
SCR(6,5>-(23,10> ,150,L 

Therefore th© top left corner of the w 
of A and a y coordinate of 3. The 
window has coordinates 23,10. The co 
yellow graphic character is 150 , 
characters is inserted at the far ri 
Appendix E for a list of the alphanume 



the window and (c ,d) is 

dow. e Is the alphanumeric 

s that is Inserted <in 

column Is inserted at the 

U for up, D for down, L 

a must be less than c, and 

s by 16 down, a and c are 

to 31, and b and d range 

nd 1 1 ne was: 

lndow has a x coordinate 
bottom right corner of the 
de for a * checkerboard * 
so a column of these 
ght of the window. See 
rlc code. 



Change Line 60 so it reads: 



60 SCR(6,5)-<23,10) , 130,U 



When you run the program you will notice the window scrolling 
up. Change Line 60 again to: 

60 SCR(6,5)-<23, 10),150,R 



This time running the program will cause the window to scroll 
right . Yet again, change Line 60 to the following and run the 
program: 
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60 SCR(6 f 3>-<23, 10) ,0,R 

In this example e is and therefore NO column of characters is 
Inserted . Change the size of the window by altering Line 60 to 
the following and running the program: 

60 SCR(0,0)-(31, 15) , 150, L 

Here the window occupies the whole screen so the whole screen 
will move left. Finally, change Line 60 to: 

60 SCR<0,0) -<3l, 15) ,255,L 

and run the program. Only the message will appear to novel this 
is because the character column that is inserted is full orange 
which is the same color as the background color (Line 20 of the 
program) . 



SCROLLING ON THE GRAPHIC SCREEN 



Type in the following program! 



left. The syntax for 



10 TEXTOFF 

20 PM0DE3, 1 

30 C0L0R3,2 

40 CLS 

50 CIRCLE(138,96) ,90 

60 PRINTQ132, "Scrolling"! 

70 REPEAT 

80 PSCR(0,0)-(31,47) ,L 

90 UNTIL0-1 

and run it. A circle will scroll to the 
PSCR is \/Bry similar to SCR, and reads: 

PSCR(a,b) -<c,d) , direction 

Notice that there is no e in the syntax of PSCR. e is assumed 
to be the current background color. In PMODEs and 2, a and c 
go. from to 15. In PMODEs 1,3 and 4, a and c range from to 
31. In PMODE0, b and d go from to 11. In PMODEs 1 and 2, b 
and d go from to 23. In PMODEs 3 and 4, b and d range from 
to 47. Hence the window mentioned in Line 80 of the above 
program occupies the entire graphic screen . In the above 
program, e was 2 because the background color was 2. If the 
background color Is the same as the foreground color then no 
new color column or row is inserted. 
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Chapter 9. A Miscellany 



BORDER 

The BORDER command Hill draw a border on the text screen. In a 
way , BORDER is very similar to the high resolution command 
•LINE...,B" of Extended Color BASIC. BORDER'S syntax is: 

BORDER (a,b) -(c,d),t 

where (a,b) are the co-ordinates of the upper left corner of 
the rectangle in which the border will be drawn, and (c f d) are 
the co-ordinates of the bottom right corner. Obviously a<c, b<d. 
a and c are numeric expressions that go from to 31, b and d 
go from to 15. For example, to draw a border in a checkered 
yellow character f just inside the edge of the text screen, one 
would type in the following program: 

10 TEXTON 

20 CLS 

30 BORDER(0,0>- (31,15) , 130 

40 REPEAT 

30 UNTIL0-1 

The REPEAT. . . UNTIL0-1 loop of course means • repeat for ever • and 

because it is placed at the end of the program, It acts like ah 

infinite loop. Typing 

40 GOTO40 

would achieve the same effect. However, if you decide to write 

programs in a structured way, then you should use as few GOTO's 

as possible. Change Line 30 to: 

30 BORDER(0,0> -(31, 13) , 150, F 

and run the program. This time the whole screen is 
'checkerboard yellow* . This is because the ',F* at the end 64 
the BORDER command line tells the computer to fill the area of 
the screen surrounded by the border with the same character 
that the border has been drawn in. 



EXTRA GRAPHIC PAGES 



Enter TEXTOFF. Then enter NEW12. Finally enter PMODE0 F 12. You 
might imagine that entering PMODE0 ,12 will generate an ?FC 
error, but this is not the case. The reason is that the NEU 
command with a number following it tells the computer to not 
only erase the program currently in memory, but to PCLEAR that 
number of graphic pages. Normally one can PCLEAR only 8 graphic 
pages, but with NEW the highest number of pages that can be 
reserved is 18. Therefore when you entered NEW12, the computer 
NEWed your program and PCLEARed 12 graphic pages. It was then 
possible, of course, for the computer to go into PMODE0,12 . 
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FILL 

In EXP , you can fill sections of memory with a particular 
number. The syntax for the FILL command is: 

FILL s.e.n 

where s is the start address of the section of memory, e Is the 
end address of the section of memory and n is the number with 
which the section of memory will be filled, s and e are numeric 
expressions going from to 65535 , and n is a numeric 
expression with a range of to 255. Enter TEXTON (unless you 
are already in the 'TEXTON state') and enter FILL1024 , 1335, 255. 
The text screen should clear to orange, because the text screen 
goes from byte 1024 to byte 1535 in memory and 255 is the 
alphanumeric code for the full orange character. 



MCOPY 



The MCOPY command copies a section of memory to another section 
of memory. Its syntax Is: 

MCOPY f,t,n 

where f Is the start address of the section of memory that is 
being copied and t is the start address of the section of 
memory that is receiving the copy, n Is the number of bytes 
that will be copied. 



REVERSE VIDEO 



REV 'reverses' the color of the text characters on the text 
screen. Enter the following program to see REV in actiohi 

10 CLS 

20 PRINT-PRESS ANY KEY TO REVERSE THE COLOR" 

30 REPEAT 

40 REPEAT 

50 UNTILINKEYSO"" 

60 REV 

70 UNTIL0*! 



Press <BREAK> to get back into the *0K f mode, 
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GOTO, GOSUB VARIABLE LINE NUMBERS 

In EXP , one can put variables after GOTO and GOSUB commands. 
Type in the -following: 

10 h»10 
20 REV 
30 GOTOh 



and run it to understand its significance. (You can use this 
method instead of Extended's ON ...GOTO.., op ON. .. GOSUB. .. > 
Press <BREAK> to escape -from the program. 
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SECTION 2 - EDIT/HELPER COMMANDS 
***************** * ******* ******** 



Chapter 10. Keys 

Due to memory limitations, all of the features of EXP cannot 

exist in memory at once. This section of the manual describes 

the editing and helper features of EXP. If you have these 



have the graphic screen 
features introduced in 



features in memory then you cannot 

features as well. The graphic screen 

Section 1 were'. 

printing text on the graphic screen, 

scrolling the graphic screen, 

PCLEARing more than 8 graphic pages 

using the NEW command, and 

switching from text to graphic screen and vice versa using the 

TEXTON and TEXTOFF commands. 



Therefore a separate EXP program was made that has the editing 
and helper features but not the graphic screen features. To 
load that program first switch off your computer. If it is 
already on, switch it off and turn it on again. 

If you have disk and a CoCo ttl 



1) Load EXP as described in Chapter 3. 
2> Put the EXPDISK in drive 0. 
3) Enter: *COM<E> 

If you have disk and a CoCo W2 

1) Insert EXPDISK into drive 0. 

2) Enter RUN'R" . When "R" is fully run, the fol lowing message 
should appear on the screen: 

DISK EXTENDED COLOR BASIC 1,0 
COPYRIGHT (C) 1980 BY TANDY 
UNDER LICENSE FROM MICROSOFT 

3) Enter RUN"E". When the program has fully run, the following 
message should appear on the PM0DE4 graphic screen: 

DISK EXPANDED COLOR BASIC 1.3 
COPYRIGHT 1984 BY T.DELBOURGO 
INCLUDES EDIT/HELPER COMMANDS 

If you have tape 



1) Put 

2) Pos 

3) En 
press 

4) Ent 
appear 



3) Pos 
6) En 
press 
7> Aft 



program. 
When the 'OK' prompt re 

When the following 



appears 
message 



EXPTAPE into tape recorder, 
itlon tape to beginning of "R 
ter CLOAD and press <PLAY> 
<STOP>. 

er RUN and press <PLAY> 
s, press <STOP>: 

EXTENDED COLOR BASIC 1,0 

COPYRIGHT fC) 1980 BY TANDY 

UNDER LICENSE FROM MICROSOFT 
ition tape to beginning of B E' program. 

ter CLOAD and press <PLAY>. When the 'OK' prompt appears 
<STOP>, enter RUN and press <PLAY> again, 
er the following message appears, press <STOP>: 
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EXPANDED COLOR BASIC 1.3 
COPYRIGHT 1984 BY T.DELBOURGO 
INCLUDES EDIT/HELPER COMMANDS 



The editing and heiper features now reside 
memory. 



in your computer' 



ON-SCREEN COPYING 

Type anything you like and press <ENTER> 
key. While holding the <CLEAR> key down, 
You will see a reverse video cursor t 
'second cursor') above the normal cursor. 
<CLEAR> key and simultaneously pressing 
move the second cursor around the screen, 
key will no longer clear the screen. Pos 
over a character on the screen. Press 
computer will now copy the character 
part of the line that you are typing 
computer also moves the cursor one pos 
you press <CLEAR>/<@>. When you have 
pressing <ENTER> the second cursor van 
to press <CLEAR>/<arrow key> to bring it 



. Now press th 
press the up a 
which we shal 1 

By holding 
the arrow keys 

Note that the 
ition the seco 

<CLEAR>/<S> 
and make that 
in. Observe 
ition to the r 

-finished cap 
ishes and you 
back into oper 



e <CLEAR> 
rrow key. 

call the 

down the 

, one can 

<CLEAR> 

nd cursor 

and the 
character 
that the 
ight when 
ying, by 
wi 1 1 have 
at ion. 



This method of moving a second cursor about and copying 

characters on the screen offers a new way to edit programs and 

information. On-screen copying also works with the LINEINPUT 
and INPUT commands. 



FUNCTION KEYS 



You can define any of the number keys (0 to 9) to stand for (up 
to) 15 characters. For example, you could define <0> to 
represent LIST . You activate this by using the KEY command. In 
this case you would enter! 

KEY0 - LIST- 

Now, whenever <CLEAR>/<0> is pressed, LIST will become part of 
the line that you are currently typing in. You can also make a 
key represent an enter, for instance. To make <0> represent 
LIST <ENTER> you would enter! 

KEY0"LIST"+CHR»U3> 



CHR»(13) is the character that represents the enter key. Now 
all you need do is press <CLEAR>/<0> and your program is listed. 



2.4- 



AUTOKEY REPEAT 

Is it not a nuisance that if you wish to type 32 spaces, you 
must press and release the <SPACEBAR> 32 times? With 'autokey 
repeat* you need only press the key down once and hold it until 
32 spaces appear on the screen. To enable autokey repeat use 
the KEYSCR command. Its syntax is: 

KEYSCR a,b 

where a is the number of sixtieths of a second before the key 
•repeats' and b is the number of sixtieths of a second between 
each repeat . a and b are numeric expressions ranging from to 
255. 

Enter KEYSCR30,3 . Press the <SPACEBAR> and hold it down . 
Notice how the key autorepeats . There is one problem with 
autorepeating: when entering BASIC words using the right and 
down arrow keys , as described in Chapter 3, the key that you 
are pressing down autorepeats as well as the BASIC word! This 
is unavoidable. 



To disable autokey repeat, enter: 
KEYSCR255,255 



IS 



Chapter 11, Printing Aldi 



AUTOLINE NUMBERING 

The computer can supply you automatically with line numbers as 
you type in your programs . For the computer to do this, you 
must use the AUTO command. Its syntax is: 

AUTO s» i 



where s Is the start line and i Is the increment. Both s 
are numeric expressions ranging -from to 63999. 



md 



Enter AUTO20 ,5 . Type in the following program. With AUTO, of 
course, do not type in the line numbers. Here is the program: 

20 PRINT-THIS IS A PROGRAM" 

23 PRINT-THAT SHOULD BE TYPED IN* 

30 PRINT'USING THE EXPANDED COLOR BASIC" 

35 PRINT-AUTO COMMAND." 

40 END 



To get out of the 'AUTO state', prej 
program. It should appear as above. 



<BREAK>. Now list thi 



ADJUSTABLE PRINTER WIDTH 

You can change the width of your printer using the WIDTH 
command. Its syntax Is: 

WIDTH p 

where p is a numeric expression representing the new printer 
width. 



Enter WIDTH32 and LLIST the program . You will see that no 
LLISTed program line is longer that 32 characters, and this is 
exactly how it appears on the video screen. 
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SECTION 3 - Q-SCREEN COMMANDS 

Chapter 12. The Q-screen 

There is a third EXP program in which you are not able to use 
the graphic screen features , nor the editing and helper 
features. Instead you have available the 'Q-screen features . 
These are associated with the Semi graphi cs-24 mode. In that 
mode, the resolution of the screen is 32 across by 192 down , 
and in EIGHT colors. Because of the poor quality of most TV s, 
these colors when blended in with one another, often produce 
new color mixtures , that are distinct colors. The color mixing 
is achieved by putting two colors (which may be different) on 
alternate horizontal lines. 

To load the 'Q commands' first switch on your computer. If it 
is already on then switch it off and turn it on again. Obey the 
following loading instructions! 

If you have d i sl< and a CoCottl 

1) Put EXPDISK into drive And load £XP. 

2) Enter: *COM(Q) 

If you have disk and a CoCo*»2 

i> Insert EXPDISK into drive 0. 

2) Enter RUN'R- . When "R" is fully run, the following message 
should appear on the screen: 

DISK EXTENDED COLOR BASIC 1.0 
COPYRIGHT (C) 1981 BY TANDY 
UNDER LICENSE FROM MICROSOFT 

3) Enter RUN'G". When the program has fully run the following 
message should appear on the screen: 

DISK EXPANDED COLOR BASIC 1.3 
COPYRIGHT 1984 BY T.DELBOURGO 
INCLUDES Q-SCREEN COMMANDS 



If you have tape 

1) Put EXPTAPE into tape recorder. 

2) Position tape to beginning of -R" program. 

3) Enter CLOAD and press <PLAY>. When the "OK 
press <STOP>. 

4) Enter RUN and press <PLAY>. When the 
appears press <STOP>: 

EXTENDED COLOR BASIC 1,0 
COPYRIGHT (C) 1980 BY TANDY 
UNDER LICENSE FROM MICROSOFT 
3> Position tape to beginning of "Q" program.^ 

6) Enter CLOAD and press <PLAY>. When the 
press <STOP>, enter RUN and press <PLAY> again. 

7) After the. f o 1 lowi ng message appears, press <STOP> 

EXPANDED COLOR BASIC 1.3 
COPYRIGHT 1984 BY T.DELBOURGO 
INCLUDES Q-SCREEN COMMANDS 



* prompt reappears 
following message 



OK* prompt appears 
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Enter PM0DE4,1 and the 9 commands wi 1 became -Fully operational . 
It Is necessary to enter PM0DE4,1 because the Q-screen can only 
be applied In that PMODE. 

Type In the -Following program: 

10 QON 
65 REPEAT 
70 UNTIL0-1 

and then run it. The G-screen will be displayed. Press <BREAK> 
to get back into the *0K' mode. The GON command, In Line 10 of 
the program, instructs the computer to show the Q-screen on the 
TV . The opposite o-f QON command is QOFF which tells the 
computer to go back to the text screen. 



CLEARING THE Q-SCREEN 

Add this line to your program: 

15 QCLS(3,4) 

and run it again. A new color, mauve, will -fill the entire 
screen . The command, QCLS, clears the Q-screen to a color mix 
o-f two colors. In the example above, the colors were blue and 
red . This then means that all even horizontal lines will be 
blue, and all odd ones will be red. 

Change Line IS to: 

IS QCLS(0,0) 

Now run the program. This time the screen will be cleared to a 
solid black color. 

SETTING AND RESETTING POINTS 
Add these lines! 



20 FORx-0TO63 

25 QSET(x f 96,2) 

Z0 NEXTx 

35 FORy«0TO191 

A0 QSET(32 f y,7) 

43 NEXTy 

and run the program . Oh the black screen th»r* Mill appear II 
yellow horizontal line that Is bisected by a magfchta vertical 
line . You may deduce that the command, QSEf, sets a point on 
the Q-screen. Its syntax is: 

QSET (x,y,c) 

where x is the x coordinate and ranges -frbtn to" 63, y Is the y 
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coordinate and goes -from to 191. c is the color and ranges 
-from 1 to 8. x, y and c are all numeric expressions. 

To reset a point on the Q-screen (set It to black), we use the 
QRESET command. Its syntax is: 

QRESET (x t y) 

where x la the x coordinate and y is the y coordinate, x and y 

are again numeric expressions. 

Add these lines to the program and then run it: 

30 FORx-0TO63 

55 QRESET (x, 96) 

60 NEXTx 

The original yellow line will be reset. 



FINDING OUT THE COLOR OF POINTS 



We can probe the color o-f any location with the »POINT(Q 1' 
•function . Type in the following program to see f POINT(Q;' in 
action: 



10 QON 

20 QCLSC0,0) 

30 REPEAT 

40 QSET(RND<64)-1,RND(32) -1,RND(8) ) 

50 UNTILPOINT(Q!32,96)<>0 

The program will set randomly colored dots at random positions 
on the Q-screen until the dot at the centre of the screen 
(coordinates 32,96) is not black. The *POINT(Q I* function in 
Line 50 returns the color of the point at the specified x and y 

coord 1 nates. 
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Chapter 13. 9 printing and scrolling 



PRINTING ON THE Q-SCREEN 

Here is a program which demonstrates how to print on the 
G-screen: 

10 QON 

20 QCLS(7,8) 

30 QPRINT5231, "THIS IS AN EXAMPLE" 

40 GPRINT0266, "OF PRINTING" 

50 REPEAT 

60 UNTIL0-1 



Run it . Press <BREAK> to return to the *0K* mode, 
notice a new command in Lines 30 and 40. Its syntax is! 



You will 



QPRINT m* 



where mS la a string expression, 



QPRINT3 Is also 
•for the TEXT scr 

1) QPRINT will 
number into a at 

2) QPRINT will o 

3) QPRINT does n 
screen does no 
the far bottom r 
was placed at 
and 40, NEWER pu 
line . If you 

' +CHR*(13> ' at t 



implemented. The 'Q' co-ordinate is the same as 
een. Three things to note: 

only print strings, not numbers. To convert a 
ring, use Color BASIC'S STRS -function, 
nly print one string expression. 

ot advance to the next line, unlike PRINT. The 
t scroll up when the printing position reaches 
ight of the screen. Notice that no semi-colon 

the end of the QPRINT command line in Lines 30 
t a semi-colon at the Bnd of a QPRINT command 

want to advance to the next line then put a 
he end o-f the string expression. 



SCROLLING THE Q-SCREEN 

You can scroll the Q-screen using the QSCR command. QSCR*s 
syntax is: 

QSCR (a ,b)-(c f d) f e ,f , direction if a column or row is to be 
1 nserted 

OR 



QSCR (a, b) -<c,d) , , direction St no column or row is to be 
1 nserted. 
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fa ,b) are the coordinates of the top left corner of the window, 
<c;d) are the coordinates of bottom right corner of the window . 
The grid size of the Q-screen for scrolling is the same as for 
the text screen. Therefore a and c go from to 31, b and d go 
from to 15. e and f are the two colors that make up the color 
mix of the column or row that is inserted. 

The next progrsm illustrates scrolling on the Q-screen: 

10 QON 

20 QCLS<3,4> 

30 QPRIMT07, "THIS IS AN EXAMPLE" 

40 QPRINTQ42, "OF SCROLLING" 

50 REPEAT 

60 QSCR(7,0>- (24,15) ,7,8, D 

70 UNTIL0-1 

Type in and run the program. The message *THIS IS AN EXAMPLE OF 

PRINTING* will scroll down the screen. A color mix row Of 7 and 

8 is inserted. Press <BREAK> to get out of the program. By 
changing Line 60 to: 

60 QSCR(7,0)-(24, 15) , ,D 

no new row will be inserted. 



IMPORTANT NOTE 



NEVER USE A VARIABLE STARTING WITH THE LETTER Q WITH THE Q 
COMMANDS IN MEMORY. 



THE STOP COMMAND HAS BEEN RENAMED QUIT, 



l\ 



,.*««•/,*. I 
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SECTION 4 - EXTRA COMMANDS AND SAMPLE PROGRAMS 
******* ****-Ht*+***********-Hf*-Ht*^^ 



Chapter 14* Extra commands 



With any of the throe EXP programs, you may also have the 
'extra commands' In memory . These commands will, however, 
consume 1.25K of User RAM. To load the extra commands first 
load any of the three EXP programs (the loading Instructions 
•for the EXP programs are mentioned in Chapters 3, 10 and 12) . 
Then: 

If you have disk 



1) Put the EXPDISK Into drive 0. 

2) Enter: *EXTRA 

If you have tape 



1) Put EXPTAPE Into recorder. 

2) Position tape to start of "EXTRA" program. 

3) Enter CLOAD and press <PLAY>. When the 'OK 1 prompt reappears, 
press <STOP>. 

4) Enter RUN and press <PLAY>. When the 'OK* prompt appears 
press <STOP>. 

The extra commands are now resident in memory . All extra 
commands begin with a *.' (full stop symbol). 



Type in the program and run it. To type in the ' C character 
press <SHIFT>/<down arrow) and to type in ■ ]• press 
<SHIFT>/<right arrow) . Enter any number from 128 to 255 in 
answer to the prompt: "CHARACTER OF LINE". What this program 
does is to print 5 asterisks vertically and then a line of the 
graphics character of the code that you entered. (If the 
graphic screen features happen to be in resident in memory, 
then enter TEXTON before running the program). 

After the program has run, enter: PRINTc . The computer will 
respond with the same number as the number that you inputted. 
You would be correct In thinking that the value of c changed 
when the procedure was executed. However, before the value of c 
changed, we localized the variable. Hence, when the computer 
returned from the procedure, it restored the original value of 
c . 

Now, let's go through the difficult lines of the program. Line 
5 tells the computer to forget any previous local variables. 
You must always put ' . DELLOC * at the beginning of a program 
that requires local variables. (You should also put '.DELLOC* 
in an error trapping routine). Line 7 tells the computer that 
only one variable will be made local and that It shall be a 
number. The computer can localize a maximum of 255 string 
variables and 255 numeric variables . In order to tell the 
computer that a maximum of 250 string variables and 31 numeric 
variables will be localized you would need to include the 
following line as part of your program: 

DIMM (31), US<250) 



LOCAL VARIABLES 

With the extra commands, you can make variables in procedures 
'local' . When a variable is 'localized', the computer remembers 
its original value. Thus when the procedure is finished and the 
computer returns from the procedure, It restores the variable 
to its original value. The fallowing program is an example of 
the use of local variables: 

5 .DELLOC 

7 DIMM (1) 

10 INPUT-CHARACTER OF LINE"|c 

20 PROCprint asterisks(S) 

30 PRINTSTRING*(32,c) 

40 END 

60 DEFPROCprlnt asterisks(n) 

70 .LOCc 

80 FORc-lTOn 

90 PRINT'*" 

100 NEXTc 

110 .ENDPROC 



If you are not sure how many variables will be made local then 
make a reasonable estimate . You can always begin with 
dimensioning M and C 3* larger than they need be. Line 70 
localizes the variable c. If you want to localize more than one 
variable, then separate each variable name by a comma. The * . 
ENDPROC* command in Line 110 delocalizes the variable(s) and 
the returns from the procedure. Whenever a procedure localizes 
variables , you must always put an '.ENDPROC* rather than just 
'ENDPROC as the procedure's last line. 



A ?BS error will result if you try and localize 
than you have dimensioned C] and M*. 



more variables 
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EXECUTING STRINGS AS COMMANDS 

With the extra commands, strings can be executed as commands. 
Simply place a '.' (full stop symbol) in front of the string 
and you're in business. 
For example, enter; 

. "CLS" 

and the screen will clear. Enter: 

a*-"CLS- 
«a* 

and the screen will again clear . This is not possible in 
Extended Color BASIC! Therefore, the syntax for executing 
strings as commands is: 

.c* 

where c* is a string expression . If the string expression 
begins with a string function then you must put a »••+» in 
front of the string expreslon. 



e.g. 



,LEFT*(a*,3) is incorrect, but 
■"+LEFT*(a* f 3) is correct. 



When equating string variables to be equal to string constants, 
using the 'executing a string as a command* feature, you must 
put a *■■+« i n front of the string constant. Also, your string 
cannot contain mul t icommands (commands separated by a colon) 
and cannot exceed 200 characters. 

WARNING : You cannot execute strings as commands if the strings 
contain the words FOR, NEXT, REPEAT, UNTIL, GOTO, GOSUB , a 
multiline IF. . THEN, • ELSE statement or an extra command. Neither 
can you use the abbreviations question mark or apostrophe for 
the PRINT and REM commands in your str: 
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Chapter IS. Sample programs 



CONGRATULATIONS ! ! ! 

If you have ploughed through the manual and understood all the 

concepts, then you have mastered Expanded Color BASIC. At first, 

you may find It necessary to reread the whole manual to fully 
absorb it. 

Some sample programs are provided. It is time to run and study 
them now. Use the graphic screen features for sample program 
filenames beginning with the letter 'G* , and the Q-screen 
features whenever the filenames start with a 'Q'. To load and 
run the programs, obey the following instructions: 

If you have disk 



1) Put EXPDISK into drive 0. 

2) Enter RUN"f 1 1 ename" (where 
the sample program). 



f i 1 ename 



the f i 1 ename of 



If you have tape 

1) Put EXPTAPE into tape recorder, 

2) Position tape to beginning of sample program, 

3) Enter CLOAD, and press <PLAY>. 

4) When the 'OK* prompt appears, press <STOP>. 

5) Enter RUN 



I hope that you will have fun exploiting the power of Expanded 
Color BASIC in your own programs. Appendices are supplied for 
ready reference. 



Again, happy EXProgrammi ng, 



3? 
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APPENDIX fi - PRINTS POSITIONS 
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APPENDIX C - ERROR CODES 



APPENDIX B - KEYWORDS 



KEY 


> ARROW 


V ARROW 


WORD 


KEY 


WORD 


KEY 




GOTO 


GOSUB 


AND 


6 > 


LINE 


N > 


i 


DRAW 


DRIVE 


ASC( 


U V 


LIST 


I > 


- 


EDIT 


AUDIO 


AUDIO 


- V 


LOAD 


C V 


. 


GET 


UNLOAD 


AUTO 


I V 


MERGE 


N V 


/ 


PUT 


BACKUP 


BACKUP 


/ V 


MID«( 


J V 





CLS 


PAINT ( 


BEEP 


G > 


MOTOR 


K > 


1 


LIST 


AUTO 


CHRSt 


F V 


NEXT 


W > 


2 


RUN 


KEY 


CIRCLE* 


M > 


ON 


1 > 


3 


CONT 


FREE* 


CLEAR 


: > 


OPEN 


4 V 


4 


REPEAT 


OPEN 


CLOSE 


5 V 


OFF 


L > 


3 


UNTIL 


CLOSE 


CLS 


> 


PAINT* 


V 


6 


AND 


EOF 


COLOR 


X > 


PEEK* 


P V 


7 


END 


COPY 


CONT 


3 > 


PLAY 


J > 


8 


DEF 


RENUM 


COPY 


7 V 


PMODE 


2 > 


9 


PROC 


SCR 


DATA 


U > 


POKE 


P > 


: 














1 


ON 


USING 


DIM 


: v 


PROC 


9 > 


A 


PRINT 


STRINGS* 


DIR 


2 V 


PUT 


/ > 


B 


RESET 


RENAME 


DRAW 


, > 


READ 


I > 


C 


SCREEN 


LOAD 


DRIVE 


, v 


RENAME 


B V 


D 


INPUT 


INKEY4 


DSKI* 


R V 


RENUM 


8 V 


E 


STEP 


DSKOS 


DSKO* 


E V 


REPEAT 


4 > 


F 


ENVELOPE 


CHR*( 


EDIT 


- > 


RESET 


B > 


G 


BEEP 


LEFTS ( 


ELSE 


Y > 


RESTORE 


> 


H 


SOUND 


RIGHT** 


END 


7 > 


RIGHT** 


H V 


I 


READ 


JOYSTK* 


ENVELOPEF > 


RND* 


W V 


3 


PLAY 


MID*< 


EOF 


D V 


RUN 


2 > 


K 


MOTOR 


HEXSt 


FOR 


Q > 


SAVE 


X V 


L 


OFF 


INSTRf 


FREEC 


3 V 


SCR 


9 V 


M 


CIRCLE* 


VERIFY 


GET 


. > 


SCREEN 


C > 


N 


LINE 


MERGE 


GOSUB 


V 


SET 


V > 





RESTORE 


INT( 


GOTO 


> 


SOUND 


H > 


P 


POKE 


PEEK* 


HEX** 


K V 


STEP 


E > 


Q 


FOR 


TO 


IF 


R > 


STR*( 


S V 


R 


IF 


DSKI* 


INKEY* 


D V 


STRINGS (A V 


3 


WRITE 


STR*( 


INPUT 


D > 


THEN 


T > 


T 


THEN 


LEN( 


INSTR< 


L V 


TO 


Q V 


U 


DATA 


ASC( 


INT< 


V 


UNLOAD 


, V 


V 


SET 


KILL 


JOYSTK* 


I V 


UNTIL 


5 > 


w 


NEXT 


RND* 


KEY 


2 V 


USING 


I v 


X 


COLOR 


SAVE 


KILL 


V V 


VALt 


Y V 


Y 


ELSE 


VAL( 


LEFT** 


G V 


VERIFY 


M V 


z 


PMODE 


DIR 


LEN( 


T V 


WRITE 


S > 



CODE 


ERROR 


DESCRIPTION 





NF 


■NEXT" prior to FOR 


1 


SN 


Syntax 


2 


RG 


■RETURN- be-fore -GOSUB" 


3 


OD 


Out of data 


4 


FC 


Invalid parameter 


5 


OV 


Over-flow as tt id too big 


6 


OM 


Oat o-f memory 


7 


UL 


Unde-f Ined line M 


8 


BS 


Invalid subscript in array 


9 


DD 


Red iniens i oned array 


10 


/0 


Invalid division by 


U 


ID 


Invalid command 


12 


TM 


Type mismatch 


13 


OS 


Out of string space 


14 


LS 


Overlong string 


IS 


ST 


Overcomplex * operation 


16 


CN 


Cannot continue 


17 


FD 


Data out o-f sequence 


18 


AO 


File already opened 


19 


DN 


Wrong device ** 


20 


10 


Input/Output error 


21 


FM 


File mismatch 


22 


NO 


File not opened 


23 


IE 


Reading past file end 


24 


DS 


Missing Line « 


25 


UF 


Undefined function 


26 


NE 


Nonexistent file 


27 


BR 


Bad record 8 


28 


DF 


Disk is full 


29 


OB 


Out of buffer space 


30 


WP 


Disk is write protected 


3i 


FN 


Unacceptable file name 


32 


FS 


Bad file structure 


33 


AE 


Already existing file 


34 


FO 


Field length overflow 


35 


SE 


String not fielded 


36 


VF 


Verification error 


37 


ER 


Past end of record 
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APPENDIX D - SAMPLE DEFINING ENVELOPE PROCEDURE 
4HHHt****^4HHHHt****4HHHHHHHtt 



You are invited to includo one or other of these envelopes to 
produce certain sound effects in your programs: 



60000 DEFPROCdef ine envelopes 

60029 'Horn 

60010 ENVEL0PE1 ; 1,50,1 \ 1,206, 110,0,010,0,0 

60019 'Alarm 

60020 ENVEL0PE2I 1,50,110,0,410,0,41 1,206,1 

60029 'Hooter 

60030 ENVELOPES 1 0,200,1 J 0,206, 4 J 0,0, 0| 0,0,0 

60039 'Harpsichord 

60040 ENVEL0PE41 0,255, 2551 0,0, 010,0, 010, 0,0 

60049 'Violin 

60050 ENVELOPES ;0, 1,25510,0,255(0,0,010,0,0 

60059 'Siren 

60060 ENVEL0PE6J 1,0,255(255,0, 255J0.0, 010, 0,0 

60069 'Trill 

60070 ENVELOPE? J 0,0,9110,0, 2 1 246, 0,2 10, 0,10 

60079 'Foghorn 

60080 ENVEL0PE81 40, 200, 3 I 80, 129, 31 1 , 1 , 2; 236, 100, 3 
60090 ENDPROC 
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APPENDIX E - ALPHANUMERIC CODE 

TrTr TTTTTT TmOnr T TTTTT T TTTTTTTTTT 



The alphanumeric code of graphic characters is the same as the 
ASCII code -- see page 276 of "Getting Started with Color 
BASIC" In order to wbrU out the code of a graphic character. 



The following list gives the codes for reverse- video characters. 
Incidentally , one may derive the normal character codes by 
adding 64 to the numbers appearing below: 



CHAR. 


CODE 


@ 





A 


1 


B 


2 


C 


3 


D 


4 


E 


5 


F 


6 


G 


7 


H 


8 


I 


9 


J 


10 


K 


11 


L 


12 


M 


13 


N 


14 





15 


P 


16 


G 


17 


R 


18 


S 


19 


T 


20 


U 


21 


V 


22 


w 


23 


X 


24 


y 


25 


2 


26 


C 


27 


\ 


28 


1 


29 


j* 


30 


< 


31 



CHAR. 


CODE 




32 


■ 


33 


■ 


34 


n 


35 


* 


36 


% 


37 


k 


38 


■ 


39 


( 


40 


) 


41 


* 


42 


+ 


43 


f 


44 


- 


45 


: 


46 


/ 


47 





48 


1 


49 


2 


50 


3 


51 


4 


52 


5 


53 


6 


54 


7 


55 


8 


56 


9 


57 


: 


58 


l 


59 


< 


60 


m 


61 


> 


62 


? 


63 
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P - SYNTAX OP EXPANDED BASIC 



Syntax Morda 



Extra commands 

. DELLOC - clear* all previously localised variables Page 31 

,LOC - localises one or more variables Page 31 

.string - executes a string as a command Page 33 



AUTO - automatic line numbering -for programs 

BEEP - sounds a previously de-fined envelope 

BORDER - draws border on text screen 

CHRS - can rede-fine a character 

CONTERROR - causes an error upon <BREAK> 

CONTOFF - disables < BREAK > 

COMTON - enables <BREAK> 

DEFPROC - defines start of procedure 

ENDIF - to end a multiline IF. . THEN. . ELSE statement 

ENDPROC - returns -from a procedure 

ENVELOPE - de-fines sound envelope 

ERROR - causes an error 

ERROROFF - disables a previously activated error trap 

FILL - -fills area of memory with specified character 

GOSUB - calls subroutine: variables can now be used 

GOTO - goes to a line: variables can now be used 

KEY - defines function key 

KEYSCR - changes autokey repeat 

MCOPY - copies memory block into another section 

NEW - can reserve more than S graphic pages 

ONERROR - defines error trap 

POINT(Qi ) - returns color of point on Q-screen 

PROC - calls a procedure 

PSCR - scrolls the graphic screen 

QCLS - clears the Q-screen to specified color mix 

QOFF - changes video output to text screen 

QON - changes video output to Q-screen 

QPRINT - prints a string on the Q-screen 

QRESET - sets a point to black on the Q-screen 

QSCR - scrolls the Q-screen 

QSET - sets a dot on the Q-screen 

REPEAT - defines start of REPEAT ... UNTIL ioop 

REV - reverses the video text screen 

SCR - scrolls the text screen 

TEXTOFF - changes display to graphics screen 

TEXTON - changes display to text screen 

UNTIL - repeats a loop until a condition is true 

WIDTH - defines width of printer output 



Page 


25 


Page 


14 


Page 


19 


Page 


16 


Page 


12 


Page 


12 


Page 


12 


Page 


9 


Page 


7 


Page 


9 


Page 


14 


Page 


12 


Page 


13 


Page 


20 


Page 


21 


Page 


21 


Page 


23 


Page 


24 


Page 


20 


Page 


19 


Page 


12 


Page 


28 


Page 


9 


Page 


18 


Page 


27 


Page 


27 


Page 


27 


Page 


29 


Page 


28 


Page 


29 


Page 


27 


Page 


7 


Page 


20 


Page 


17 


Page 


4 


Page 


4 


Page 


7 



Star commands 

*SIZE(51x24) - go into '31x24* state 

*SIZE(32xl6> - go into '32x16* state 

*EXTRA - load in extra commands 

*COM(E) - load in editor/helper commands (for CoCo 

#COM(Q) - load in Q-screen commands (for CoCo Wl) 

#COM(G> - load in graphic screen <for Coco #1) 

STAR COMMANDS ARE COMMANDS THAT ARE STORED ON DISK, 



Ml) 
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